home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / SYMBOL / Utilities / Randomize / rnd2 < prev   
Encoding:
Text File  |  1998-10-23  |  453 b   |  17 lines  |  [TEXT/ScoM]
  1. rnd2 range-min range-max
  2.  
  3. Returns a random number in the range from range-min to range-max. Like get-random but the random numbers are not coerced to integers.
  4.  
  5. (init-rnd 0.456)
  6.  
  7. (let ((out nil))
  8.   (dotimes (i 10)
  9.     (push (rnd2 -5 5) out))
  10.   out)
  11. --> (2.767029962487868 -1.3808704783878056 -2.673227537961793
  12.  -1.7709425932116574 0.33362624315486755 3.449228071331163 
  13.  3.008006167874555 -0.027266511096968316 2.1555576871469384 
  14.  -2.1869143400545)
  15.  
  16.  
  17.